
ڱ PictureBox ؼʾͼʾУͼλõ·E̵ġͼļУļface00.icoface01.icoface02.icoface03.ico 4ļʾٶ PictureBox ؼButtonؼ
1ʹ Image  FromFile  Image   
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     Static i As Integer
     i = (i + 1) Mod 4
     Me.PictureBox1.Image = Image.FromFile("E:\ͼ\" & "face0" & i.ToString &  ".ico")
End Sub
2ʹ Bitmap  Image 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Static i As Integer
    i = (i + 1) Mod 4
    PictureBox1.Image = New System.Drawing.Bitmap ("E:\ͼ\" & "face0" & i.ToString & ".ico")
End Sub


